program multiply99
    implicit none
    integer i,j
    do i=1,9
        do j=1,i
            write (*,10) j,i,j*i
        end do
    print *,
    !print *,' '
    end do
10 format(i2,'*',i1,'=',i2,$)
!1x exist or not seems doesn't matter
end program

